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Disclaimer 

Vector Graphic makes no representations or warranties with respect to the 
contents of this manual itself, even if the product it describes is covered by 
a warranty or repair agreement. Further, Vector Graphic reserves the right to 
revise this publication and to make changes from time to time in the content 
hereof without obligation of Vector Graphic to notify any person of such 
revision or changes, except when an agreement to the contrary exists. 


Revision Numbers 

The date and revision of each page herein appears at the bottom of each page. 
The revision letter such as A or B changes if the manual has been improved but 
the product itself has not been significantly modified. The date and revision 
on the Title Page corresponds to that of the page most recently revised. When 
the product itself is modified significantly, the product will get a new 
revision number, as shown on the manual's title page, and the manual will 
revert to revision A, as if it were treating a brand new product. THIS MANUAL 
SHOULD ONLY BE USED WITH THE PRODUCT (S) IDENTIFIED ON THE TITLE PAGE. 
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GENERAL DESCRIPTION 


The Version 4.1 Monitor is a complete systems Monitor, able to support the 
Flashwriter II (80 X 24) board, and the Vector Graphic Keyboard, Thus it is 
recommended for use with the Mindless Terminal. All keyboard and video I/O 
can be done through the Monitor's I/O routines, freeing higher level software 
from carrying a variety of versions for different hardware configurations. 
Version 4.1 was designed to be used with the Flashwriter II board. Use Version 
4.0C for serial terminals. 

Version 4.1 differs from 4.0 in the following key ways: 

1) A new command has been added to jump directly to the bootstrap loader 
for Vector 8" floppy disk drives. (Executive cammand "V".) 

2) A new command has been added to jump directly to the bootstrap loader 
for the Vector Winchester technology hard disk drive. (Executive 
caranand "W" . ) 

In addition to I/O, the Monitor includes an extensive command executive, a 
compactly written program designed to facilitate manipulation and display of 
memory data. The "prompt" which indicates that the Monitor Executive is 
waiting for operator entry is "Mon>". 

There are 26 commands which are entered as a single letter followed by up to 
four hexadecimal data fields. After each field is entered, a space is 
automatically ouput as a prompt. Either upper or lower case alpha 
characters may be used, but lower case characters will be converted to upper 
case, and any non-hex characters will be ignored. Allowable hex characters 
are 0-9, A-F. Address fields are four digits long; other fields are two 
digits long. The executive is useful in debugging hardware and software, 
particularly assembly language softare, because it is resident in the 
system. 

If a space is typed at any tine during field entry, a default value of zero 
is assumed for all leading zeroes. This applies to an entire field as well 
as one that has been partially entered, and the cursor will advance to the 
next field if required. For example, typing (SP) will have the same effect 
as typing 0000; typing 100 (SP) will have the same effect as 0100. 

Ary command that generates a display can be tenporarily halted with a space 
and continued with another space. The ESCape key will abort a display or 
caranand entry. 

The 4.1 Monitor is located at address E000H - E7FFH in Vector Graphic 
systems. 
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The hexadecimal number system may seem confusing if you are not familiar 
with it, but it has become the standard of the microcomputer field and is 
clearly the best system with 16 bit addresses and 8 bit data. It is usually 
not necessary to convert between number systems, as this is usually done by 
software (i.e. assemblers). Remembering a few values in hex should make 
things easy: 


HEX NUMBER DECIMAL VALUE JARGON BINARY BITS 


A 

10 


4 

B 

11 


4 

C 

12 


4 

D 

13 


4 

E 

14 


4 

F 

15 


4 

10 

16 


5 

FF 

255 


8 

100 

256 

1 PAGE 

9 

3FF 

1,023 


10 

400 

1,024 

IK 

11 

FFF 

4,095 


12 

1000 

4,096 

4K 

13 

4000 

16,384 

16K 

15 

8000 

32,768 

32K 

16 

FFFF 

65,535 

64K-1 

16 


The familiar rules of arithmetic work just the sane in hex as in decimal: 

10H Hex Trivial ) 

40H) 400H 
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COMMAND FORMAT 

Mon >A <ADRI> <ADR2> - ASCII DUMP 

Memory contents from ADRl through ADR2 will be displayed as ASCII 
characters, or graphic symbols for values less than 20 hex. If the most 
significant bit is high, reverse video is displayed. This command is useful 
for examining files such as those created by the lineditor, BASIC or 
MEMDRITE. ASCII strings embedded in object code are easy to recognize. 

Mon >B - JIMP TO BOOTSTRAP LOADER 

Typing this command will cause a jump to location F800H which is the disk 
bootstrap loader. This will cause the disk operating system disk to be 
loaded into memory and transfer control to CP/M. 

Mon >C <ADRl> <ADR2> <ADR3> - COMPARE BLOCKS 

A byte-by-byte comparison will be made between the block of memory data 
starting at ADRl and ending at ADR2 and a block of identical length starting 
at ADR3. The differences will be printed out with the address, the byte in 
the first block and the byte in the second block. This conmand is useful to 
compare two versions of a program or to verify that PROMs have been 
programmed correctly. 

Mon >D <ADR1> <ADR2> - DCMP IN HEX 

Memory contents from ADRl through ADR 2 will be displayed as pairs of 
hexadecimal characters. The left character in each pair represents the four 
most significant bits of the memory location. The display may be halted and 
interrupted as described above. The ASCII representation is displayed in a 
column on the right. 

Mon >E - EXTERNAL COMMUNICATIONS 

The monitor will output anything typed on the keyboard through port 4 on the 
ZCB single board computer, the Bitstreamer II I/O board or an appropriately 
addressed Bitstreamer I board. Anything received on this port will be 
displayed on the screen. Normally a 300 baud modem would be connected to 
the serial RS 232 output from the I/O board, and this feature allows the 
system to be used as a simple terminal bo communicate with a host in a full 
duplex mode. Operation at speeds above 300 baud requires the host to send 
null characters after linefeeds, so that characters are not lost when the 
screen scrolls up. 
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Mon >F <ADRl> <ADR2> <BYTEl> <BYTE2> - FIND TWO BYTES 

Ibis memory range from AER1 through ADR2 will be searched for the particular 
code combination BYTE 1 BYTE 2. This is useful for locating particular 
commands or jump addresses. For example, if you wish to change a control 
character (say control D) in a program you may try FE 04, which is CPI 04 
since this is a common way of testing input characters. If you wish to find 
all locations that call or junp to a particular address, say C700H, then 
search for 00C7. There is no guarantee that each location displayed is 
valid object code - it nay be part of a data table, ASCII string, or second 
and third bytes of a three byte instruction. 

Mon >G <ADR1> - GO TO AND EXECUTE 

This command will cause a junp to ADRl to execute a program or user 
subroutine. As with all Monitor junp commands, the address contained on the 
stack is "START" (C00BH) and if the user routine at ADRl ends in "RET", 
program execution will return to the Monitor. Virtually unlimited stack 
space is available (up to IK), but of course, pushing more registers on the 
stack than are popped will defeat the return feature with undesirable 
effects. 

Mon >H - JIMP TO HI RAM N 

This command jumps to FC00H which is the start of the IK scratchpad RAM. 
This is a useful area for small machine language programs. 

Mon >I <PORT> - INPUT FRCM A PORT 

Execution of this command will cause the CPU to execute an "IN PORT" 
instruction and the accumulator contents immediately following this to be 
displayed. This command is useful in checking out peripheral equipment. 
Only those ports used by the terminal, cassette interface, etc., will 
contain interesting values. All others will read FF since the data bus will 
be floating when the "IN" command is executed. 

Mon >J - JUMP TO LOADED DOS 

This command permits return to the MDOS disk operating system at 04E7H, or 
if not present, junp will be 0000H, which is the CP/M warm start location. 

Mon >K - SET BREAKPOINTS 

This command expects a 4 digit address, and will place a RESTART 7 (FF) at 
that location in RAM. When that instruction is executed, which is a call to 
location 0038H, the CPU will junp to the monitor routine that dumps the 
register contents. The instruction replaced with FF will also be restored. 
If a program is loaded over 0038H, the breakpoint instruction will be 
defeated unless RESET is depressed. Entry of the monitor at E000H will 
clear the breakpoint, as will pressing the RESET switch. 
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Mon >L - JUMP TO LOW RAM AT Q000H 

This command jumps to memory location 0000H which is the beginning of 
program memory. This is the CP/M warm start location. 

Mon >M <ADR1> <ADR2> <ADR3> - MOVE MEMORY BLOCK 

The data contained in memory starting at ADR1 and ending at ADR2 is moved to 
memory locations starting at ADR 3 . This command is useful for moving a 
program frcm a temporary storage location- to its correct address. If there 
is an overlap of the two memory areas, interesting results are obtained. 
For example, M 6000 7BFF 6400 will cause the block of data from 6000 through 
63FF to be repeated 8 times from 6000 through 7FFF, since by the time 
location 6400 is read, it has been overwritten with data from 6000. This is 
useful for baric programming of proms, or for creating repeating instruciton 
sequences for test purposes. 

Mon >N - ^-DESTRUCTIVE MEMORY TEST 

Memory locations starting at 0000 are read and the data temporarily stored. 
The memory location is then tested to see if 00 and FF can be written and 
read correctly. This continues after rewriting the original data until the 
first error is detected, whereupon the address is displayed followed by the 
data written into memory and what was read fran it. This command is most 
useful for checking how much memory a system contains. For example , if the 
system contains 16K of memory, 4000 00 FF should be printed, indicating that 
there is no memory at address 4000. Since the test is non-destructive to 
data in memory, it can be used at any time. 

M.on X) <P0RT> <DATA> - OUTPUT TO PORT 

The two hex digits "DATA" are loaded into the accumulator and the instrucion 
"OUT PORT" is executed. This command is useful for checking our peripheral 
equipment. For example, if a printer is connected to I/O port 6, 0 06 41 
will cause an "A" to be printed since 41 is the hex ASCII code for "A". 

Mon >P <ADR1> - PROGRAM MEMORY 

The contents of 16 bytes of memory containing ADRl are displayed in both hex 
and ASCII, allowing preceeding and following instructions to be viewed. 
Advancing to the next instruction is accomplished by typing space or cursor 
right ( ). Backspace or cursor left ( ) goes backwards. The cursor up 

and down keys move to an adjacent 16 byte block. Any hex characters typed 
will replace the existing contents of RAM. After every keypress, the screen 
display is refreshed by reading from memory, so the display reflects the 
exact memory contents. Tb terminate, depress ESCAPE. 
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Mon >Q <ADRI1> <ADR2> - COMPUTE CHECKSUM 

The MOD 256 checksum of memory contents in the address range specified is 
computed and displayed. This command is useful for checking proms or files 
to see if anything has changed. Any source file or program written in pure 
code (it does not write on itself) will have the same checksum as when it 
was loaded. While debugging assembly language programs, it is useful to be 
able to verify that a program being debugged has not written garbage in the 
source file or assembler. 

Mon >R - REGISTER DUMP 

This command will print a header identifying the Z-80 registers, and 
immediately below it the contents of all the registers. The flags are 
displayed with the letters Z C M E H for the zero, carry, minus, parity 
even, and auxiliary or half carry flags respectively. The presence of the 
letter indicates the flag is true. The contents of the memory locations 
pointed to by the B, D, and H register pairs are also displayed as is the 
return address on the stack. 

Mon >S <ADR1> <ADR2> <BYTE> - SEARCH FOR SINGLE BYTE 

This is similar to the "F" command, except that only one byte is searched 
for instead of two. An exairple of the use of this command is to display all 
locations in a program where an output to a port occurs (D3). The address 
of each location will be displayed followed by "D3" and the next byte (the 
port number). 

Mon >T <ADRl> <ADR2> - TEST MEMORY 

This is an extremely useful command, especially when first setting up a 
system. This command permits thorough testing of the system memory. A 
portion of a 64K byte pseudorandom number sequence is written into memory 
from ADR1 through ADR2, and the exact same sequence is regenerated from the 
initial point and compared with what is read from memory. If all locations 
compare, another portion of the sequence is used to repeat the test which 
continues until it is interrupted. Any memory errors are displayed with the 
address, what was written into memory and what was read from memory, 
respectively. This information is all that is needed to pinpoint a 
malfunctioning memory chip. This test is quite exhaustive if used for at 
least 10 cycles and is far superior to incrementing or complementing tests 
which may not reveal addressing problems. The only area of system memory 
that cannot be tested with this routine is the few bytes required for the 
stack and video flags in the vicinity of FFDO on the 2708 PROM/RAM board. 
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This command permits easy return to programs in the user application area of 
MDOSo 

Mon >V - 8 18 DRIVE BOOT 

Typing this command will cause a jump to E800H (contained on the Disk Boot 
#3 PROM) which is the location of the 8" drive bootstrap loader. The boot 
program will cause the CP/M operating system to be loaded into memory and 
control to be transferred to CP/M. 

Mon> W WINCHESTER DRIVE BOOT 

Typing this command will cause a jump to E802H (contained on the Disk Boot 
#3 PROM) which is the location of the Winchester drive bootstrap loader. 
The boot program will cause the CP/M operating system to be loaded into 
memory and control to be transferred to CP/M. 

Mon >X <ADRl> <ADR2> <ADR3> - EXCHANGE MEMORY BLOCKS 

A block of memory from ADRl through ADR2 is exchanged with an equal length 
block, starting at ADR3. This command is useful in comparing the operation 
of two versions of a program, or for rapid switching of portions of a 
program without destroying the original. A loaded BASIC program can be 
exchanged with another if care is used to include the stack area (usually 
below the top of allowed memory). 

Mon >Y - KEYBOARD ECHO 

This command causes keyboard input to be echoed directly to the video driver 
and can be used for demonstration purposes. An ESCape returns to the 
Monitor. 

Mon >Z <ADR1> <ADR2> <DATA> - ZERO OR FILL MEMORY 

The memory block from ADRl through ADR2 is filled with the byte "DATA 1 '. 
This is useful for setting memory to Zero. The end of a file or assembled 
program will stand out more clearly if memory is first zeroed. For test 
purposes, single instructions can be executed continuously so that bus 
waveforms are more easily interpreted. This is done by filling a block of 
memory with a repeated instruction sequence with a junp to the start of the 
block so that the program loops continuously. 
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ENTRY POINTS 


A jump table at the beginning of the Monitor can be used to access several 
routines : 

E000 - The normal cold entry point to the Monitor Executive, this is a jump 
to the initialization routine which clears the screen and initializes 8251 
USARTS through I/O ports 3, 5, and 7. This is compatible with the 
Bitstreamer I addressed starting at port 4, the Bitstreamer II addressed 
starting at port 2 and the ZCB addressed starting at port 5. The USARTS are 
set for an X16 baud rate factor and other parameters as would be used with a 
serial printer or extra terminal. 

E003 - This is a jump to the routine which should be used for console 
keyboard status test. Return with the zero flag set indicates no keyboard 
input. 

E006 - This is a junp to the keyboard data input which returns with the 
character in the "A" register. The keyboard code conversions described 
below are carried out. There is no checking for ESC key depression. 

E009 - This is a junp to the video driver which displays the character in 
"A" on the screen. 

EOOC - This is a jump to the "ESCAPE" routine which returns zero if no 
input, or with the character in the "A" register if there is. Keyboard code 
conversions are carried out. If the ESC key was pressed, the system returns 
to the Monitor Executive. 
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VIDEO DRIVER 


Version 4 of the Monitor contains a more elaborate video driver than 
previous versions. Ihe purpose of the video driver is to accept a stream of 
ASCII codes, and to write than into the screen memory in the proper place, 
interpreting certain non printing control codes in a special way. There are 
several entry points to the video driver. E009H is recommended. The 
character code to be printed must be in the A register. A CALL E009 will 
cause the character to be printed on the screen at the cursor position. All 
registers will be preserved. 

Control codes are generated by the keyboard by holding the control (CTRL) 
key down while a letter key is pressed. Control codes have values between 0 
and 31, and are 64 less than the codes for the corresponding upper case 
letters. To demonstrate the features of the video driver, type Y after the 
Monitor prompt, and any keyboard generated code will be echoed to the video 
driver. The following control codes are interpreted as special functions, 
while all others are ignored; 


Decimal 

Value 

Hex 

Value 

Control 

Code 

Description 

2 

2 

(®B) 

HOME THE CURSOR 

4 

4 

(©D) 

CLEAR THE SCREEN AND HOME CURSOR 

5 

5 

(©E) 

DISPLAY THE CODE IN B REGISTER 

8 

8 

(®H) 

DESTRUCTIVE BACKSPACE (also BACKSPACE key) 

9 

9 

(®I) 

TAB OVER TO THE NEXT 8 MULTIPLE (also TAB) 

10 

A 

(®J) 

LINEFEED (also LF Key) 

13 

D 

(®M) 

CARRIAGE RETURN (also RETURN key) 

14 

E 

(®N) 

TOGGLE CURSOR 

16 

10 

(®P) 

CLEAR TO END OF SCREEN 

17 

11 

(®Q) 

CLEAR TO END OF LINE 

18 

12 

(®R) 

CURSOR DOWN (also ) 

20 

14 

(®T) 

TOGGLE REVERSE VIDEO 

21 

15 

(®U) 

CURSOR UP (also ) 

23 

17 

(®W) 

CURSOR LEFT (also ) 

24 

18 

(®X) 

CLEAR TO START OF LINE 

26 

1A 

(®Z) 

CURSOR RIGHT (also ) 

27 

IB 

ESC 

CURSOR XY POSITION LEAD-IN 


Experiment with the keys. There are special keys on the keyboard to generate 
some of the codes such as RETURN, TAB and linefeed (LF). If you are using the 
Vector Graphic Keyboard or Mindless Terminal, there are also keys for the 
cursor control and BACKSPACE. A few of the functions are not self explanatory. 
A Control D sets the reverse video flag to normal in addition to clearing the 
screen and homing the cursor. A Control T will then toggle the reverse video 
flag from normal to reverse and back without printing on the screen. 
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In some cases it is desirable to print the symbol for a control code on the 
screen. This can be done in assembly language programs by putting the code for 
the symbol in the B register and calling the video driver with Control E (05) 
in A. Enter the folowing machine code at FCOOH and execute it to demonstrate 
this feature: 

at FC00 06 02 3E 05 04 CD 09 E0 CD 0C E0 C3 02 FC 


CURSOR X Y POSITIONING 


Many programs utilize random X Y positioning of the cursor. This is done by 
outputting a three byte sequence to the video driver. The first code is ESC 
( 1BH ) followed by the desired X position and Y position in hex. This may be 
done through assembly language or a higher level language such as Basic. The 
tq? left comer of the screen is 0, 0. The assembly language sequence IB 40 08 
would cause the cursor to move to line 8 f character position 64 on the screen. 
To send the same sequence to the Monitor via Microsoft Basic, the following 
statement would be used "PRINT CHR$(27) ;CHR$(X+128) ;CHR$(Y+128) where X would 
equal 64 (40H) and Y would equal 08 (08H). This may not be demonstrated using 
the keyboard since ESC causes a return to the monitor. 

The video driver provides an extensive range of special controls, however, they 
must be incorporated into the software generating the video stream to be 
meaningful. For instance a piece of software that merely echoes all characters 
as they go intq its input buffer will allcw cursor motion on the screen, but 
this will probably be meaningless to the software. 


KEYBOARD CODE CONVERSION - VECTOR GRAPHIC KEYBOARDS 

Due to limitations in the keyboard encoder chip, the [] key on Vector Graphic 
keyboards is not encoded properly. The correct code is generated by a 
conversion routine in the Monitor's CONVERT routine. The codes for backslash 
an< 3 tilde are also produced by the control and control shift mode of this key. 


[] KEY CONVERSION: 


MODE 

KEYCODE 

CONVERTED CODE 

ASCII SYMBOL 

unshifted 

FI 

5B 

[ 

shifted 

El 

5D 

] 

control 

B1 

5C 

® 

control shift 

Al 

7E 

IN 


The cursor up key is also converted from 60H to 15H which is interpreted 
correctly by the video driver. Rocm is provided in the routine for up to 15 
keycode conversions. Foreign languages require additional conversions, and 
versions are available for French, German, Swedish and Spanish. It is 
essential that software utilize the monitor conversion routine for this 
reason. 
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USING THE I/O ROUTINES 

The I/O routines in the Monitor are used as the Main System I/O in Vector 
Graphic Systems. This makes software I/O independent and easily 
interchangeable between systems. An example of how this is done is shown 
below? 


INPUT ROUTINE: 

INPT 

CALL 

EOOCH 




JZ 

INPT 




RET 

(RETURNS WITH CHAR INPUT IN 

A) 

OUTPUT ROUTINE: 

OUTPT 

JMP 

E009H (CHARACTER IN A) 


BREAK TEST: 

CCNTL 

CALL 

EOOCH 




RET 

(RETURNS WITH ZERO FLAG SET 

IF NO 


INPUT, OR CHARACTER IN A. JUMPS 
TO MONITOR EXECUTIVE IF ESCAPE 
INPUT.) 


Note that either the ESC key will break to the Monitor, which provides a 
convenient way of transferring control fran any executive such as the DOS or 
BASIC to the Monitor, but necessitates the use of another character (Control C 
is standard) for a single level break. The routines above are merely given to 
illustrate how simple it is to use the Monitor I/O routines. Many program 
require additional instructions to move the character to be output into t± 
accumulator, or may require different flag conditions or accumulator contents 
on return frcm the input and Break Test routine, but the variations are easily 
implemented . 
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OTHER USEFUL MONITOR ROUTINES 


The Monitor contains a number of routines that can be called by user programs, 
and which will save considerable programming effort. In addition to the 
keyboard input and video output described elsewhere, we have: 

AHEX inputs four hex digits from the keyboard and returns the binary value in 
D, E registers. A space is automatically output at the end. All registers, 
except B, are used. Entry at AHEX with a value of 1-3 in C will convert that 
many digits. Non hex values will be ignored. 

CRLF will output a carriage return and line feed to the screen. The A register 
is used. 

SPCE will output a space to the screen. The A register is used. 

RNDM returns a new random number in B,C based on the seed in B,C as it is 
called. B,C should not contain 0000. The pseudorandom number sequence 
generated is 2 1 -1 entries long and is based on a software simulation of a 
shift register with maximum length feedback. PSW is used. 

PTAD first outputs a CRLF, then outputs the binary value in H, L as four hex 
digits followed by a space. PSW used. 

PT2 outputs (A) as two hex digits. 

TAHEX calls AHEX twice, inputting two address fields of four hex digits. The 
first value is returned in H,L; the second in D,E. 
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PAGE 1 


0000 E000 

0000 EOOO 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 


BASE EQU OEOOOH | ASSEMBLY ADDRESS 

PR EQU OEOOOH | PROM/RAM ADDRESS 

LINK 'M6' 


VECTOR HZ MONITOR - VERSION 4.1 * 

R. S. HARP 7/16/79 HODIFIED 6/1/80 * 

ft 

SYSTEM EQUATES 


0000 

0000 

s 

CONS 

EQU 

0 

2 CONS STATUS PRT 

0000 

0001 

3 

COND 

EQU 

1 

ICONS DATA PORT 

0000 

0040 

a 

RDA 

EQU 

40H 

I RECEIVE FLAG 

0000 

0000 

a 

STPOL 

EQU 

0 

I STATUS POLARITY 

0000 

FFDO 

a 

SPTR 

EQU 

PR+01FD0H 

1 STACK POINTER 

0000 

E800 

a 

DSBOOT 

EQU 

0E800H 

IDUALSTOR BOOTSTRAP 

0000 

E802 

a 

MSBOOT 

EQU 

0E602H 

jMEGASTOR BOOTSTRAP 


0000 


0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 

0000 


************ COMMAND FORMAT ********** 
A SSSS FFFF ASCII DUMP OF MEMORY 
B JUMP TO BOOTSTRAP LOADER 
C SSSS FFFF CCCC COMPARE BLOCKS 
D SSSS FFFF DUMP MEMORY IN HEX 6 ASCII 
E EXTERNAL COMMUNICATIONS 
F SSSS FFFF DD DD TWO BYTE SEARCH 
G SSSS GO TO AND EXECUTE 
H JUMP TO HIGH RAM AT FCOO 
I PP INPUT FROM PORT 
J JUMP TO BOS 
K LLLL SET A BREAKPOINT 
L JUMP TO LOW RAM AT 0 
M SSSS FFFF DDDD MOVE BLOCK 
N NON DESTRUCTIVE MEMORY TEST 
0 PP DD OUTPUT TO PORT 
P LLLL PROGRAM MEMORY 
Q SSSS FFFF COMPUTE CHECKSUM 
R DUMP Z-BO REGISTERS 


A 

A 

* 

A 

A 

A 

A 

A 

A 


0000 


* S 

SSSS 

FFFF DD SEARCH FOR SINGLE 

BYTE 

ft 

0000 


* T 

SSSS 

FFFF TEST 

MEMORY 


ft 

0000 


* u 

JUMP 

TO USER AREA AT 2B00 


ft 

0000 

. 

* V 

BOOT 

FROM 8 INCH DISK 


ft 

0000 


* w 

BOOT 

WINCHESTER DISK 


ft 

0000 


* X 

SSSS 

FFFF DDDD 

EXCHANGE BLOCK 


ft 

0000 


* Y 

KEYBOARD ECHO 



ft 

0000 


* 2 

SSSS 

FFFF DD ZERO OR FILL MEMORY 

ft 

0000 



ft ft ft ft 



kftftftftftftftfi 

ftftftftft 

0000 


* 






0000 




ORG 

BASE 



EOOO 


* JUMP 

TABLE OF ENTRY 

POINTS 



EOOO 

C318E0 

HON IT 


JMP 

INIT 

1 INITIALIZE ALL 

E003 

C33CE1 

KEYTST 


JMP 

KEYSTAT 

I TEST 

KEYBOARD 

E006 

C341E1 

KEY DATA 

JMP 

CONVERT 

J INPUT 

KEYBOARD 

E009 

C38AE3 

CRT 


JMP 

VIDEO 

{OUTPUT TO SCREEN 

EOOC 

C32FE1 

ESC 


JMP 

ESCAPE 

I KEYBOARD INPUT 

EOOF 

00 



NOP 




E010 

00 



NOP 
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E011 

00 


NOP 



E012 


ft 




E01 2 


* TABLg 

OF COMMANDS FOE 

USART 


E012 

00000040 

INITABLE DB 

0,0,0,40H,OCEH, 

2711 

E016 

CE27 





E018 


ft 




E018 

31D0FF 

INIT 

LX I 

SP.SPTR 

1 INIT STACK 

E01B 

CD2FE1 


CALL 

ESCAPE 

;DUMP LATCH 

E01E 

AF 


XRA 

A 


E01F 

32EAFF 


STA 

XYFLAG 


E022 


* INITIALIZE USARTS AT 

PORTS 3,5,7 


E022 

0E03 


MVI 

C,3 

.•STARTING PORT 

E024 

0606 

IN I LOOP 

MVI 

B, 6 

;NO OF COMMANDS 

E026 

2112E0 


LX I 

H, INITABLE 


E029 

EDB3 


OUTIR 


S BLOCK OUTPUT 

E02B 

OC 


INR 

C 


E02C 

OC 


I NR 

C 


E02D 

79 


MOV 

A, C 


E02E 

FE09 


CPI 

9 

; DO 3 PORTS 

B030 

20F2 


JRNZ 

IN I LOOP 


E032 


* PATCH 

RST 7 



E032 

3EC3 


MVI 

A, 0C3H 

|JUMP 

E034 

323800 


STA 

3811 

I RST 7 

E037 

21D7E6 


LX I 

H, DUMPREGS 


E03A 

223900 


SilLD 

3911 


E03D 


* DISPLAY SIGN ON 



E03D 

CDDEE4 


CALL 

SIGN 


E040 


* CLEAR 

BREAKPOINT 



E040 

2AE7FF 

CLRBRK 

LHLD 

BKPTLOC 


E043 

11E9FF 


LX I 

D, BRKCODE 


E046 

ED53E7FF 


SDED 

BKPTLOC 


E04A 

1A 


LDAX 

D 


E04B 

77 


MOV 

M, A 


E04C 

31D0FF 

START 

LX I 

SP.SPTR 

j INITIALIZE STACK 

E04F 

2100F0 


LX I 

H, PAGE 

j FULL SCREEN SCROLL 

E052 

22DFFF 


SIILD 

TOSCN 


E055 

CD3AE5 


CALL 

PROMPT 


E058 

CD2FE1 

KEYPOL 

CALL 

ESCAPE 

; READ KEYBOARD 

E05B 

28FB 


JRZ 

KEYPOL 


EOSD 

E65F 


AN I 

5FH 

1 UPPER AND LOWER 

E05F 

214CE0 


LX I 

H, START 


E062 

E5 


PUSH 

H 


E063 

FE04 


CPI 

■D'-64 


E065 

CC8AE3 


CZ 

VIDEO 

; ECHO CLEARSCN 

E068 

FE41 


CPI 

•A 1 


E06A 

D8 


RC 


;TOO SMALL 

E06B 

FE5B 


CPI 

05BH 


E06D 

DO 


RNC 


|TOO LARGE 

E06E 

21F9E0 


LX I 

H.CMDTB+7EH 


E071 

F5 


PUSH 

PSW 


E072 

87 


ADD 

A 


E073 

85 


ADD 

L 


E074 

6F 


MOV 

L, A 


E075 

5E 


MOV 

E,M 


E076 

23 


INX 

11 


E077 

56 


MOV 

D,M 


E078 

EB 


XCI1G 
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v • ' 


E079 

FI 



POP 

PSW 


E07A 

E9 



PCHL 


1 AWAY WE GO 

fe07B 


* COMMAND TABLE 




E07B 

43E5 

CMDTB 


DW 

WASCII 

J A 

E07D 

47E2 



DW 

BOOT 

1 B 

E07F 

F1E2 



DW 

COMPR 

|C 

E081 

C7E5 



DW 

IIEXRUL 

|D 

E083 

DCE7 



DW 

EXTCOM 

|E 

E085 

14E3 



DW 

FIND 

IF 

E087 

AFEO 



DW 

EXEC 

|G 

E089 

65E2 



DW 

RAM 

|H 

E08B 

62E3 



DW 

PINPT 

|I 

E08D 

96E1 



DW 

WARM 

U 

E08F 

C1E7 



DW 

SETBRK 

IK 

E091 

71E2 



DW 

LORAM 

|L 

E093 

A5E2 



DW 

MOVEB 

|M 

E095 

CDE2 



DW 

NDMT 

|N 

E097 

74E3 



DW 

POUTP 

|0 

E099 

14E6 



DW 

PROGRAM 

|P 

E09B 

79E1 



DW 

CHKSM 

10 

E09D 

CBE6 



DW 

DREGS 

|R 

E09F 

21E3 



DW 

SRCH 

IS 

E0A1 

C3E1 



DW 

TMEM 

IT 

EOA3 

56E2 



DW 

USER 

|U 

E0A5 

00E8 



DW 

DSBOOT 

|V 

E0A7 

02E8 



DW 

MS BOOT 

|W 

E0A9 

96E2 



DW 

EXCHG 

|X 

EOAB 

AEE1 



DW 

ECHO 

I* 

EOAD 

7DE2 



DW 

ZEROM 

|Z 

EOAF 


* 





EOAF 


444 EXECUTE 

THE 

PROGRAM 

AT THE ADDRESS 

**» 

EOAF 


* 





EOAF 

CDD3E4 

EXEC 


CALL 

PTSTNG 

1 

E0B2 

474F2054 



DTI! 

•GO TO • 

1 

EOB6 

4FA0 






EOB8 

CDBDEO 



CALL 

AIIEX 

j READ ADD FROM KB 

EOBB 

EB 



XCI1G 



EOBC 

E9 



PCHL 


| JUMP TO IT 

EOBD 


ft 





EOBD 


444 CONVERT 

UP 

TO 4 HEX 

DIGITS TO BIN 


EOBD 


* 





EOBD 

0E04 

AI1EX 


MVI 

C»4 

I COUNT OF 4 DIGITS 

EOBF 

210000 

AHEO 


LX I 

H, 0 

| 16 BIT ZERO 

E0C2 

CD2FE1 

AHE1 


CALL 

ESCAPE 


EOC5 

FE20 



CPI 

• • 

l SPACE? 

EOC7 

CAE8E0 



JZ 

SPCOVR 


EOCA 

CDEDEO 



CALL 

HEX 

{CHECK VALUE 

EOCD 

38F3 



JRC 

AHE1 


EOCF 

29 



DAD 

H 

|MULT H 4 16 

EODO 

29 



DAD 

H 


EODl 

29 



DAD 

H 


EOD2 

29 



DAD 

H 


EOD3 

85 



ADD 

L 


EOD4 

6F 



MOV 

L, A 


EOD5 

OD 



OCR 

C 

8 4 DIGITS? 

E0D6 

C2C2EO 



JNZ 

AI1E1 

S KEEP READING 

E0D9 

EB 



XCHG 
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I 


EODA 

3E20 

SPCE 


MVI 

A, 2 OH 

SPRINT SPACE 

EODC 

C38AE3 

PTCN 


JMP 

VIDEO 


EODF 

3E0D 

CRLF 


MVI 

A, ODII 

SPRINT CR 

E0E1 

CDDCEO 



CALL 

PTCN 


E0E4 

3E0A 



MVI 

A,0AH 


E0E6 

18F4 



JR 

PTCN 


E0E8 


* 





E0E8 

CD8AE3 

SPCOVR 


CALL 

VIDEO 


EOEB 

18EC 



JR 

SPCE— 1 


EOED 


* 





EOED 


4 CHECK 

FOR HEX 

VALUE 

, CONVERT 


EOED 

FE30 

HEX 


CPI 

30H 

S<0 

EOEF 

D8 



RC 



EOFO 

FE3A 



CPI 

■ . i 

1 >9 

E0F2 

3809 



JRC 

NUM 


EOF4 

E65F 



AN I 

5FH 

SUPPER i LOWER CASE 

E0F6 

FE41 



CPI 

•A 1 

1 <A 

E0F8 

D8 



RC 



E0F9 

FE47 



CPI 

•G' 

S>F 

EOFB 

3F 



CMC 



EOFC 

D8 



RC 



EOFD 

CD8AE3 

NUM 


CALL 

VIDEO 


E100 

D630 



SUI 

48 

S ASCII BIAS 

E102 

FEOA 



CPI 

10 

S DIGIT 0-10 

E104 

3802 



JRC 

ALFA 


E106 

D607 



SUI 

7 

SALPHA BIAS 

E108 

A7 

ALFA 


ANA 

A 

S CLEAR CY 

E109 

C9 



RET 


SWITH CY CLEAR 

E10A 


* 





E10A 


4 READ 2 

DIGITS 

FROM 

THE CONSOLE 


E10A 

0E02 

AHE2 


MVI 

C,2 


E10C 

18B1 



JR 

AHEO 


E10E 


* 





E10E 


4 SHORT 

ROUTINE 

TO SAVE CODE 


E10E 

CDBDEO 

TAHEX 


CALL 

AH EX 


Bill 

18AA 



JR 

AHEX 


EU3 


* 





El 1 3 


444 READ 

FROM CONSOLE 

TO REG A 444 


E113 


ft 





Ell 3 

CD2FE1 

RDCN 


CALL 

ESCAPE 

SREAD KEYBOARD 

E116 

28FB 



JRZ 

RDCN 


El 18 

FE60 



CPI 

60H 


El 1A 

38C0 



JRC 

PTCN 


E11C 

E65F 



AN I 

5FH 


El IE 

18BC 



JR 

PTCN 


E120 


* 





El 20 

CD2FE1 

PAUSE 


CALL 

ESCAPE 


E123 

FE20 



CPI 

20H 


El 25 

CO 



RNZ 



E126 

CD2FE1 

PLOOP 


CALL 

ESCAPE 


E129 

FE20 



CPI 

2011 


E12B 

C226E1 



JNZ 

PLOOP 


E12E 

C9 



RET 



E12F 


* 





E12F 

CD3CE1 

ESCAPE 


CALL 

KEYSTAT 


E132 

C8 



RZ 



E133 

CD41E1 



CALL 

CONVERT 
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EX36 

FE1B 



CPI 

1BH 

i ESCAPE 

i 

E1A8 

FEC3 


CPI 

OC3H 


El 38 

CA4CE0 



JZ 

START 


1 

E1AA 

C20000 


JNZ 

0 

(CP/M RESTART 

E13B 

C9 



RET 




E1AD 

E9 


PCHL 


(MDOS WARM START 

E13C 


* 






E1AE 


ft 




E13C 

DB00 

KEYSTAT 


IN 

CONS 



E1AE 


* KEYBOARD 

ECHO ROUTINE 



E13E 

E640 



AN I 

RDA 



E1AE 

CDD3E4 

ECHO 

CALL 

PTSTNG 


E140 

C9 



RET 




E1B1 

4543484F 


DTH 

•ECHO KEYS * 


E141 


ft 






E IBS 

204B4559 





E141 


* KEYBOARD 

CODE CONVERSION 



E1B9 

53A0 





E14 1 

DB01 

CONVERT 


IN 

COND 

(KEYBOARD DATA 


E1BB 

CD2FE1 

ECOLP 

CALL 

ESCAPE 

(LOOK AT KEYBOARD 

E143 

E5 



PUSH 

H 



E1BE 

C4DCE0 


CNZ 

PTCN 

(PRINT IF KEYPRESS 

E144 

C5 



PUSH 

B 



E1C1 

18F8 


JR 

ECOLP 

(CONTINUE LOOPING 

E145 

010500 



LX I 

B, TABLEND- KTABL/2 


E1C3 


ft 




E148 

215BE1 



LX I 

H, KTABL 


i 

E1C3 


MEMORY 

TEST ROUTINE 

ftftft 


E14B 

EDA1 

LOOP 


CCI 


fCOMPARE TABLE 


E1C3 


ft 




E14D 

2806 



JRZ 

FND 


& 

E1C3 

CDD3E4 

THEM 

CALL 

PTSTNG 


E14P 

23 



INX 

1! 



E1C6 

54455354 


DTH 

•test 8 


E) 50 

EA4BF.1 



JPE 

LOOP 

(CONT LOOKING 


E1CA 

AO 





E153 

1801 



JR 

NFND 



E1CB 

CD0EE1 


CALL 

TAHEX 

(READ ADDRESSES 

E155 

7E 

FND 


MOV 

A,M 

|NEW CODE 


E1CE 

015A5A 


LXI 

B,5A5AH 

(INI B,C 

E156 

E67F 

NFND 


AN I 

7FII 

(MASK DOWN 


ElDl 

CDFDE1 

CYCL 

CALL 

RNDM 


E158 

Cl 



POP 

B 



E1D4 

C5 


PUSH 

B 

(KEEP ALL REGS 

El 59 

El 



POP 

II 



E1D5 

E5 


PUSH 

II 


E15A 

C9 



RET 




E1D6 

D5 


PUSH 

D 


E15B 


* 





i 

E1D7 

CDFDE1 

TIX3P 

CALL 

RNDM 


E15B 


* THIS TABLE 

CAN BE EXTENDED IF DESIRED 


i 

El DA 

70 


MOV 

M,B 

(WRITE IN MEM 

E15B 

E15D 

KTABL 


DD 

0E15DI1 

ll 

i 

ElDB 

CD3FE2 


CALL 

BMP 


E15D 

F15B 



DD 

0F15BH 

it 


E1DE 

C2D7E1 


JNZ 

TLOP 

(REPEAT LOOP 

E15F 

A17E 



DD 

0A17EII 

r 


ElEl 

01 


POP 

D 


E16 1 

B15C 



DD 

0B15CH 

i* 


E1E2 

El 


POP 

II 

(RESTORE ORIG 

E 1 63 

6015 



DD 

0601 511 

(CURSOR UP 


E1E3 

Cl 


POP 

B 

(VALUES OF 

E165 

E165 = 

TABLEND 


EQU 

$ 



E1E4 

E5 


PUSH 

II 


E165 




ORG 

KTABL+30 

(ROOM FOR 15 CON VS 


E1E5 

D5 


PUSH 

D 


E179 


* 






E1E6 

CDFDE1 

RLOP 

CALL 

RNDM 

(GEN NEW SEQ 

El 79 


* CHECKSUM 

ROUTINE 




E1E9 

7E 


MOV 

A,M 

(READ MEM 

E179 

CDD3E4 

CHKSM 


CALL 

PTSTNG 



E1EA 

B8 


CMP 

B 

(COMP MEM 

E17C 

43484543 



DTH 

'CHECKSUM ' 


i 

E1EB 

C41DE2 


CNZ 

ERR 

(CALL ERROR RTN 

E 180 

4B53554D 






i 

E1EE 

CD3FE2 


CALL 

BMP 


E184 

AO 







ElFl 

C2E6E1 


JNZ 

RLOP 


E185 

CD0EE1 



CALL 

TAHEX 



E1F4 

D1 


POP 

D 


E188 

0600 



MVI 

B f 0 



E1F5 

El 


POP 

II 


EISA 

7E 

CHKSMLP 


MOV 

A,M 



E1F6 

3E2E 


MVI 

A, ’ o ' 


E18B 

80 



ADD 

B 



E1F8 

CD8AE3 


CALL 

VIDEO 


El BC 

47 



MOV 

B, A 



E1FB 

18D4 


JR 

CYCL 


E18D 

CD3FE2 



CALL 

BMP 



fclFD 


THIS ROUTINE GENERATES RANDOM NOS 

*** 

E190 

20F8 



JRNZ 

CHKSMLP 


i 

E1FD 

CD20E1 

RNDM 

CALL 

PAUSE 


E192 

78 



MOV 

A, B 


t 

E200 

78 


MOV 

A, B 

(LOOK AT B 

E193 

C326E2 



JMP 

PT2 



! E201 

E6B4 


AN I 

0B4H 

(MASK BITS 

E196 


ft 





i 

1 E203 

A7 


ANA 

A 

(CLEAR CY 

E196 


* WARM START 





E204 

EA08E2 


JPE 

PEVE 

(JUMP IF EVEN 

E196 


ft 






E207 

37 


STC 



E196 

CDD3E4 

WARM 


CALL 

PTSTNG 



E208 

79 

PEVE 

MOV 

A, C 

(LOOK AT C 

E199 

4A554D50 



DTH 

’JUMP TO DOS’ 



E209 

17 


RAL 


(ROTATE CY IN 

E19D 

20544F20 







E20A 

4F 


MOV 

C,A 

(RESTORE C 

E1A1 

444F03 







E20B 

78 


MOV 

A,B 

(LOOK AT B 

E1A4 

21E704 



LX I 

II.04E7I1 

(MDOS RESTART 


E20C 

17 


RAL 


(ROTATE CY IN 

E1A7 

7E 



MOV 

A, M 



E20D 

47 


MOV 

B, A 

(RESTORE B 
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E20E C9 RET ( RETURN W NEW B,C 

E20F * 

E20F *** ERROR PRINT OUT ROUTINE 


E20F 

* 




E20F CDDFEO 

PTAD 

CALL 

CRLF 

| PRINT CR.LF 

E21 2 CD20E1 


CALL 

PAUSE 


E215 7C 


MOV 

A,H 

| PRINT 

E216 CD26E2 


CALL 

PT2 

I ASCI I 

E219 7D 


MOV 

A,L 

S CODES 

E21A C32BE7 


JMP 

PT2S 

| FOR ADDRESS 

E21D 

* 




E21D F5 

ERR 

PUSH 

PSW 

;SAVE ACC 

E21E CD0FE2 


CALL 

PTAD 

(PRINT ADD. 

E221 78 


MOV 

A,B 

(DATA 

E222 CD2BE7 


CALL 

PT2S 

(WRITTEN 

E225 FI 


POP 

PSW 

g DATA READ 

E226 F5 

PT2 

PUSH 

PSW 


E227 CD2DE2 


CALL 

BINH 


E22A FI 


POP 

PSW 


E22B 1804 


JR 

BINL 



E22D IF BIND RAR (SHIFT RUT 4 BITS 

E22E IF RAR 

E22F IF RAR 

E230 IF RAR 


E23I 

E60F 

BINL 


AN I 

OFH 

SLOW 4 

BITS 

E233 

C630 



ADI 

48 

f ASCI I 

BIAS 

E235 

FE3A 



CPI 

58 

IDIGIT 

0-9 

E237 

DADCEO 



JC 

PTCN 



E23A 

C607 



ADI 

7 

SDIGIT 

A-F 

E23C 

C3DCE0 



JMP 

PTCN 



E23F 


ft 






E23F 


* COMPARE 

ADDRESSES AND 

INCREMENT H 



E23F 

7B 

BMP 


MOV 

A,E 



E240 

95 



SUB 

L 



E241 

2002 



JRNZ 

GOON 



E243 

7A 



MOV 

A,D 



E244 

9C 



SBB 

H 



E245 

23 

GOON 


INX 

H 



E246 

C9 



RET 




E247 


* 






E247 


* DISK 

BOOTSTRAP 




E247 

CDD3E4 

BOOT 


CALL 

PTSTNG 


j 

E24A 

424F4F54 



DTH 

'BOOT DISK’ 



E24E 

20444953 







E252 

CB 







E253 

C300F8 



JMP 

PR+1800H 



E256 


* 






E256 


* JUMP 

TO 

USER RAM 




E256 

CDD3E4 

USER 


CALL 

PTSTNG 



E259 

55534552 



DTH 

■USER AREA' 



E25D 

20415245 







E261 

Cl 







E262 

C30001 



JMP 

010011 



E265 


* 






E265 


* JUMP 

TO 

RAM AT PR+1C00 



E265 

CDD3E4 

RAM 


CALL 

PTSTNG 



E268 

48492052 



DTI! 

'HI RAM* 
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E26C 4 1CD 





E26E C300FC 


JMP 

PR + 1C00II 


E271 

* 




E271 

* JUMP TO RAH 

AT 0 



E271 CDD3E4 

LORAM 

CALL 

PTSTNG 


E274 4C4F2052 


DTH 

'LO RAM' 


E278 41CD 





E27A C30000 


JMP 

0 


E27D 

t 




E27D 

* ZERO OR FILL 

■ MEMORY 

WITH A CONSTANT 


, E27D CDD3E4 

ZBROH 

CALL 

PTSTNG 


1 E280 46494C4C 


DTH 

'FILL ' 


1 E284 AO 





; E285 CD0EE1 


CALL 

TAI1EX 

I READ ADDRESSES 

i E2B8 E5 


PUSH 

H 

(SAVE H 

: E2B9 CD0AE1 


CALL 

AHE2 

jREAD 2 DIGITS 

I E2BC EB 


XCHG 



! E28D E3 


XTHL 


.•RESTORE II, L 

E28E Cl 


POP 

B 


E28F 71 

ZLOOP 

MOV 

M,C 

(WRITE INTO MEM 

1 E290 CD3FE2 


CALL 

BMP 

(COMP ADD, INCR II 

1 E293 C8 


RZ 


(RETURN IF DONE 

E294 18F9 


JR 

ZLOOP 

(CONTINUE TIL DONE 

E296 

* EXCHANGE OR 

MOVE A 

BLOCK OF MEMORY 


E296 47 

EXCHG 

MOV 

B,A 


E297 CDD3E4 


CALL 

PTSTNG 


E29A 45584348 


DTH 

•EXCHANGE ' 


E29E 414E4745 





E2A2 AO 





' E2A3 1809 


JR 

MOVENTR 


E2A5 47 

MOVEB 

MOV 

B, A 

(SAVE CODE 

E2A6 CDD3E4 


CALL 

PTSTNG 


E2A9 4D4F5645 


DTH 

•MOVE ’ 


E2AD AO 





E2AE CDOEEl 

MOVENTR 

CALL 

TAHEX 

(READ ADDRESSES 

E2B1 E5 


PUSH 

H 


E2B2 CDBDEO 


CALL 

AMEX 


E2B5 EB 


XCHG 



E2B6 E3 


XTHL 


(BACK TO NORMAL 

E2B7 4E 

MLOOP 

MOV 

C,M 


E2B8 E3 


XTHL 



E2B9 78 


MOV 

A,B 


E2BA FE4D 


CPI 

'M' 


E2BC 2804 


JRZ 

NEXCH 


E2BE 7E 


MOV 

A, M 


E2BF E3 


XTHL 



E2C0 77 


MOV 

M, A 


E2C1 E3 


XTHL 



E2C2 71 

NEXCH 

MOV 

M,C 


E2C3 23 


INX 

II 


E2C4 E3 


XTHL 



E2C5 CD3FE2 


CALL 

BMP 


E2C8 CA4CE0 


JZ 

START 


E2CB 18EA 


JR 

MLOOP 


E2CD 

» NON DESTRUCTIVE MEMORY TEST 


E2CD CDD3E4 

NDMT 

CALL 

PTSTNG 


E2D0 4D454D20 


DTH 

•MEM CHECK' 
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E2D4 

43484543 





E2D8 

CB 





E2D9 

210000 


LX I 

H, 0 

1 START AT ZERO 

E2DC 

4B 

NDLOP 

MOV 

C,M 


E2DD 

06FF 


MVi 

B.OFFIS 


E2DF 

70 


MOV 

M„B 


E2E0 

7E 


MOV 

A„H 


E2E1 

B8 


CMP 

B 


E2E2 

C2EAE2 


JNZ 

ERRJP 

1 PRINT ERROR 

E2E5 

0600 


MVS 

B,0 


E2E7 

70 


MOV 

H,B 


E2E8 

7E 


MOV 

A„H 


E2E9 

B8 


CMP 

B 


E2EA 

C21DE2 

ERRJP 

JNZ 

ERR 


E2ED 

71 


MOV 

M,C 


E2EE 

23 


INX 

H 


E2EE 

18EB 


JR 

NDLOP 


E2F1 


* COMPARE 

TWO BLOCKS OF MEMORY 


E2F1 

CDD3E4 

COM PR 

CALL 

PTSTNG 


E2F4 

434F4D50 


OIH 

•COMPARE * 


E2F8 

4 1 5245A0 





E2FC 

CD0EE1 


CALL 

TAIIEX 


E2FF 

E5 


PUSH 

II 


E 300 

CDBDEO 


CALL 

AHEX 


E303 

EB 


XCIIG 



E304 

7E 

VMLOP 

MOV 

A, M 


E305 

23 


INX 

II 


E306 

E3 


XTHL 



E307 

BE 


CMP 

M 


E308 

46 


MOV 

B,M 


E309 

C41DE2 


CNZ 

ERR 


E30C 

CD3FE2 


CALL 

BMP 


E30F 

E3 


XTHL 



E310 

20F2 


JRNZ 

VMLOP 


E312 

Fl 


POP 

PSW 


E313 

C9 


RET 



E314 


* SEARCH 

FOR SPECIFIC 

CODES 


E31 4 

F5 

FIND 

PUSH 

PSW 


E315 

CDD3E4 


CALL 

PTSTNG 


E318 

46494E44 


DTH 

■FIND-2 " 


E31C 

2D32AO 





E31F 

180D 


JR 

SRCH ENT 


E32 1 

F5 

SRCH 

PUSH 

PSW 


E322 

CDD3E4 


CALL 

PTSTNG 


E325 

53454152 


DTH 

•SEARCH-1 0 


E329 

43482D31 





E32D 

AO 





E32E 

CD0EE1 

SRCIIENT 

CALL 

TAHEX 


E331 

E5 


PUSH 

II 

>SAVE H 

E332 

CD0AE1 


CALL 

AI1E2 

; READ 2 DIGITS 

E33S 

EB 


XCHG 


SH=CODE,D=F 

E336 

45 


MOV 

B,L 

| PUT CODE IN B 

E337 

El 


POP 

II 

1 RESTORE H 

E338 

Fl 


POP 

PSW 


E339 

FE53 


CPI 

■S' 


E33B 

F5 


PUSH 

PSW 


E33C 

2807 


JRZ 

CONT 



c 
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E33E 

E5 


PUSH 

11 


E33F 

CD0AE1 


CALL 

AHE2 

8 READ 2 DIGITS 

E342 

EB 


XCHG 



E343 

4D 


MOV 

C p L 


E344 

El 


POP 

H 


E345 

7E 

CONT 

MOV 

A, M 

I READ MEMORY 

E346 

B8 


CMP 

B 

iCOMPARE TO CODE 

E347 

2012 


JRNZ 

SKP 

,°SKIP IF NO COMP 

E349 

Fl 


POP 

PSW 

; FETCH CONTROL 

E34A 

FE53 


CPI 

•S' 


E34C 

F5 


PUSH 

PSW 


E34D 

2806 


JRZ 

OBCP 


E34F 

23 


INX 

H 


E350 

7E 


MOV 

A,M 


E351 

2B 


DCX 

H 


E352 

B9 


CMP 

C 


E353 

2006 


JRNZ 

SKP 


E355 

23 

OBCP 

INX 

H 


E356 

7E 


MOV 

A, M 

SREAD NEXT BYTE 

E357 

2B 


DCX 

II 

;DECR ADDRESS 

E358 

CD1DE2 


CALL 

ERR 

SPRINT CODES 

E35B 

CD3FE2 

SKP 

CALL 

BMP 

{CHECK IF DONE 

E35E 

20E5 


JRNZ 

CONT 

SBACK FOR MORE 

E360 

Fl 


POP 

PSW 


E361 

C9 


RET 



E362 


ft 




E362 


* INPUT DATA 

FROM A PORT 


E362 

CDD3E4 

PINPT 

CALL 

PTSTNG 


E365 

494E5055 


DTH 

•INPUT ' 


E369 

54AO 





E36B 

CD0AE1 


CALL 

AIIE2 

;READ 2 DIGITS 

E36E 

4B 


MOV 

Cp E 


E36F 

ED78 


INP 

A 


E371 

C326E2 


JMP 

PT2 


E374 


ft 




E374 


* OUTPUT TO 

A PORT 



E374 

CDD3E4 

POUTP 

CALL 

PTSTNG 


E377 

4F555450 


DTH 

•OUTPUT ' 


E37B 

5554A0 





E37E 

CD0AE1 


CALL 

AHE2 

SREAD 2 DIGITS 

E381 

CD0AE1 


CALL 

AHE2 

; READ 2 DIGITS 

E 384 

4D 


MOV 

C,L 


E385 

ED59 


OUTP 

E 


E387 

C9 


RET 



E388 

/ 

ft 
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PAGE 


E38B 



* 




, E3AD 

79 

NOXV 


MOV 

A,C 

/RECOVER CHARAC 

E388 



Aft*#*## 




1 E3AE 

FE20 



CPI 

SPACE 

/PRINTING CODE 7 

E388 



* 



* 

E3B0 

F2E4E3 



JP 

PRINT 



E388 



* VIDEO DRIVER FOR 

FLASHWRITER II 

* 

j B3B3 

FE1C 



CPI 

PCL-TABL 

/TOO LARGE? 

E388 



* 



* 

I E3B5 

F251E4 



JP 

RET 



E388 



******* 



ft* ft* ft 

1 E3B8 

E5 



PUSH 

II 

/CURSOR IN MEMC 

E386 



* 




■ E3B9 

21C7E3 



LX I 

H.TABL 

/TABLE START 

E388 

FOOO 

ss 

PAGE 

EQU 

PR+1000H 

F SCREEN LOCATION 

I E3BC 

5F 



MOV 

E, A 


/ 

E388 

0020 

X 

SPACE 

EQU 

20H 


| E3BD 

1600 



MVI 

D,0 



E388 

0004 

X 

CLRSCRN 

EQU 

4 


1 E3BF 

19 



DAD 

D 



E388 



******* 




E3C0 

5E 



MOV 

E, M 



E388 



* 



* 

E3C1 

21E3E3 



LX I 

H, PCL 



E388 



* CONTROL CODE COMMANDS: 

# 

1 E3C4 

19 



DAD 

D 



E388 



* (B) 

HOME CURSOR 


* 

E3C5 

E3 



XTHL 


/RECOVER H 

E388 



* (D) 

CLEAR SCREEN 


ft 

j E3C6 

C9 



RET 


/EXECUTE ROUT I 6 

E388 



4 (E) 

PRINT CONTROL CODE 

* 

■ E3C7 


* CONTROL CHARACTER JUMP TABLE 



E388 



* <H) 

BACKSPACE 


* 

1 E3C7 

6E 

TABL 


DB 

RET-PCL 

I e 


E388 



* (I) 

TAB 


* 

1 E3C8 

6E 



DB 

RET-PCL 

;A 


E388 



* ( J 

LINEFEED 


ft 

E3C9 

63 



DB 

HOME-PCL 

:B 

HOME CURSOR 

E388 



* <M) 

CARRIAGE RETURN 


ft 

E3CA 

6E 



DB 

RET-PCL 

>c 


E388 



* (N) 

NO CURSOR 


ft 

E3CB 

60 



DB 

FORM-PCL 

ZD 

CLEAR SCREEN 

E388 



* (P) 

CLEAR TO END OF 

SCREEN 

ft 

E3CC 

00 



DB 

PCL— PCL 

/E 

PRT CONTROL 

E388 



* <Q» 

CLEAR TO END OF 

LINE 

* 

. E3CD 

6e 



DB 

RET-PCL 

ZF 


E388 



* (R) 

CURSOR DOWN 


# 

E3CE 

6E 



DB 

RET-PCL 

ZG 


E388 



* <T» 

TOGGLE REVERSE 

VIDEO 

ft 

! E3CF 

42 



DB 

DBACKSP-PCL 

/H 

BACKSPACE 

E388 



4 (O) 

CURSOR UP 


ft 

, E3D0 

59 



DB 

TAB-PCL 

/I 

TAB OVER 

E388 



* (W> 

CURSOR LEFT 


ft 

E3D1 

12 



DB 

LINF-PCL 

; J 

LINE FEED 

E388 



* (X) 

CLEAR TO START 

OF LINE 

* 

. E3D2 

6E 



DB 

RET-PCL 

/K 


E388 



* (Z) 

CURSOR RIGHT 


ft 

: E3D3 

6E 



DB 

RET-PCL 

|L 


E388 



* ESC 

XT POSITION LEAD-IN 

* 

E3D4 

6A 



DB 

CRET-PCL 

ZM 

CARRIAGE RET 

E388 



* 



* 

E3D5 

71 



DB 

RET+3-PCL 

;N 

NO CURSOR 

E388 



******* 




E3D6 

6E 



DB 

RET-PCL 

/O 


E388 



* 




E3D7 

A7 



DB 

CLEND-PCL 

ZP 

CLR SCN TO E 

E388 



* VIDEO 

BOARD PARAMETERS 


E3D8 

AC 



DB 

CLLINE— PCL 

zQ 

CLR LINE TO 

E388 

0050 

= 

HORIZ 

EQU 

80 

/NO. OF CHARACTERS 

E3D9 

12 



DB 

LINF-PCL 

zR 

CURSOR DOWN 

E388 

0018 

3 

VERT 

EQU 

24 

|NO. OF LINES 

i E3da 

6fci 



DB 

RET-PCL 

/S 


E388 



ft 




i E3DB 

76 



DB 

TVIDF-PCL 

ZT 

TOGGLE VIDEO 

E388 

3E14 


TV I DEO 

MVI 

A, 'T'-64 

/TOGGLE VIDEO 

E3DC 

80 



DB 

CURSUP-PCL 

zU 

CURSOR UP 

E38A 



* 




E3DD 

6E 



DB 

RET-PCL 

ZV 


E38A 

F5 


VIDEO 

PUSH 

PSW 


E3DE 

50 



DB 

BACKSP-PCL 

zW 

CURSOR LEFT 

E38B 

C5 



PUSH 

B 


. E3DF 

E4 



DB 

CLSTRT-PCL 

zx 

CLR START OF 

E38C 

D5 



PUSH 

D 


1 E3E0 

6E 



DB 

RET-PCL 

Z Y 


E38D 

E5 



PUSH 

H 


| E3E1 

06 



DB 

EOL-PCL 

zZ 

CURSOR RIGHT 

E38E 

E67F 



AN I 

07FH 


E3E2 

CB 



DB 

LEDIN-PCL 

zl 

ESC=XY LEADI 

E390 

4F 



MOV 

C,A 


E3B3 








E391 

3A00E8 



LDA 

BASE+800H 


E3E3 


* PRINT 

CODE 

IN B REGARDLESS 



E394 

FEC3 



CPI 

0C3H 

|PROM THERE? 

E3E3 

48 

PCL 


MOV 

C,B 



E396 

79 



MOV 

A*C 


E3E4 


* PRINT 

THE 

CHARACTER 

ON THE SCREEN 



E397 

CC00E8 



cz 

BASE+8Q0H 

/CALL IT IF SO 

| E3E4 

3ADDFF 

PRINT 


LDA 

VFL 



E39A 

CD6FE4 


DISPL 

CALL 

LIFTCURS 

/ERASE CURSOR 

■ E3E7 

A9 



XRA 

C 



E39D 

3AEAFF 



LDA 

XYFLAG 


E3E8 

77 



MOV 

M, A 



E3A0 

A7 



ANA 

A • 


E3E9 


* EOL CHECKS 

THE CURS 

POS FOR END OF 

LINE 


E3A1 

280A 



JRZ 

Noxy 


E3E9 

3ADBFF 

EOL 


LDA 

CURPOS 



E3A3 

3D 



DCR 

A 


E3EC 

3C 



INR 

A 



E3A4 

32EAFF 



STA 

XyFLAG 


. E3ED 

FE50 



CPI 

HORIZ 



E3A7 

CABEE4 



JZ 

ypos 


E3EF 

385D 



JRC 

TABRET 



E3AA 

C3B5E4 



JMP 

XPOS 


E3F1 

AF 



XRA 

A 
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E3F2 

32DBFF 



STA 

CURPOS 


E451 

CD6FE4 

RET 

CALL 

LIFTCURS 

E3F5 


* MOVE DN 1 

LINE 



E454 

El 


POP 

H 

E3F5 

3ADCFF 

LINF 


LDA 

LINENO 


E455 

Dl 


POP 

D 

E3F8 

FE17 



CPI 

VERT-1 


E456 

Cl 


POP 

B 

E3FA 

2023 



JRNZ 

NOSCRL 


E457 

FI 


POP 

PSW 

E3FC 


* SCROLL UP 

ONE 

LINE 



E458 

C9 


RET 


E3FC 

215000 

SCROLL 


LX I 

H.HORIZ 


E459 

3ADDFF 

TVIDF 

LDA 

VFL 

E3FF 

ED5BDFFF 



LDED 

TOSCN 


E45C 

EE80 


XRI 

8GH 

E403 

19 



DAD 

D 


E45E 

32DDFF 


STA 

VFL 

E404 

EDAO 

SCRL 


LDI 



E461 

18EE 


JR 

RET 

E406 

EDAO 



LDI 



E463 


ft 



E408 

7C 



MOV 

A, H 


E463 


4 MOVE THE 

CURSOR UP 


E409 

FEF7 



CPI 

IIOR I Z * VERT+ PAGE/ 256 

E463 

3ADCFF 

CURSUP 

LDA 

LINENO 

E40D 

20F7 



JRNZ 

SCRL 


E466 

A7 


ANA 

A 

E40D 

7D 



MOV 

A, L 


E467 

28E8 


JRZ 

RET 

E40E 

FE80 



CPI 

HORIZ 4 VERT+PAGElOFFH 

E469 

3D 


DCR 

A 

E410 

20F2 



JRNZ 

SCRL 


E46A 

32DCFF 

STORLN 

STA 

LINENO 

E41 2 

3ADCFF 



LDA 

LINENO 


E46D 

18E2 


JR 

RET 

E415 


* ERASE BOTTOM 

LINE 



E46F 


* CALCULATE MEM ADD FROM CURSOR POSITION 

E41S 

EB 

EBOTL 


XCIIG 



E46F 

2180F7 

LIFTCURS 

LXI 

H„H0RIZ 4 VERT+PAGE 

E4 16 

0650 



MVI 

B.HORIZ 


E472 

11B0FF 


LXI 

D,-IIORIZ 

E418 

3620 

ELOP 


MVI 

H, SPACE 


E475 

3ADCFF 


LDA 

LINENO 

E 4 1 A 

23 



INX 

II 


E478 

3C 

CLOP 

INR 

A 

E41B 

05 



DCR 

B 


E479 

19 


DAD 

D 

E41C 

20FA 



JRNZ 

ELOP 


E47A 

FE18 


CPI 

VERT 

E41E 

3D 



DCR 

A 


E47C 

20FA 


JRNZ 

CLOP 

E41F 

3C 

NOSCRL 


INR 

A 


E47E 

ED5BDBFF 

CFIN 

LDED 

CURPOS 

E420 

32DCFF 



STA 

LINENO 


E482 

1600 


HVI 

D, 0 

E423 

182C 



JR 

RET 


E484 

19 


DAD 

D 

E425 


* 





E485 


4 REVERSE 

THE VIDEO 


E425 


* ERASE BEFORE 

BACKSPACING 


E485 

7E 


MOV 

A.M 

E425 

3620 

DBACKSP 


MVI 

M. 2011 


E486 

EE80 


XRI 

80H 

E427 

3ADBFF 



LDA 

CURPOS 


E488 

77 


MOV 

M, A 

E42A 

A7 



ANA 

A 


E489 

C9 


RET 


E42B 

2824 



JRZ 

RET 


! E48A 


4 CLEAR TO 

END OF SCREEN 

E42D 

3D 



DCR 

A 


i E48A 

CDA5E4 

CLEND 

CALL 

WRSPC 

E42E 

2B 



OCX 

H 


! E46D 

18C2 


JR 

RET 

E42F 

3620 



HVI 

M, 2011 


, E48F 


4 CLEAR TO 

END OF LINE 


E431 

1818 



JR 

TABRET 


! E48F 

3ADBFF 

CLLINE 

LDA 

CURPOS 

E433 


* MOVE THE 

CURSOR BACK 



1 E492 

3620 


MVI 

M.20H 

E433 

3ADBFF 

BACKSP 


LDA 

CURPOS 


; E494 

23 


INX 

H 

E436 

3D 



DCR 

A 


1 E495 

3C 


INR 

A 

E437 

F24EE4 



JP 

TABRET 


E496 

FE50 


CPI 

50H 

E43A 

1811 



JR 

CRET 


E498 

20F8 


JRNZ 

CLLINE+3 

E43C 


* TAB OVER 

TO THE NEXT 

8 MULTIPLE 


E49A 

18B5 


JR 

RET 

E43C 

3ADBFF 

TAB 


LDA 

CURPOS 


E49C 


4 CLEAR THE SCREEN 


E43F 

F607 



OR I 

7 


E49C 

2100F0 

CLEAR 

LXI 

H , PAGE 

E441 

18A9 



JR 

EOL+3 


E49F 

22DFFF 


SIILD 

TOSCN 

E443 


* CLEAR THE 

SCREEN AND 

HOME UP 


E4A2 

22EAFF 


SHLD 

XYFLAG 

E44 3 

CD9CE4 

FORM 


CALL 

CLEAR 


E4A5 

3620 

WRSPC 

MVI 

M, 2011 

E446 

AF 

HOME 


XRA 

A 


E4A7 

23 


INX 

II 

E44 7 

32DCFF 



STA 

LINENO 


E4A8 

7C 


MOV 

A, H 

E44A 

32DDFF 



STA 

VFL 

»CLR VID FLAG 

E4A9 

FEF8 


CPI 

PAGE+2048/256 

E44D 


* CARRIAGE 

RETURN 



E4AB 

20F8 


JRNZ 

WRSPC 

E44D 

AF 

CRET 


XRA 

A 


. E4AD 

C9 


RET 


E44E 

32DBFF 

TABRET 


STA 

CURPOS 


E4AE 


* 



E451 


* RETURN TO 

THE 

CALLING 

ROUTINE 


E4AE 


* PROCESS 

LEAD IN CODE 



.■OPTIMIZED AT 
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E4AE 

3E02 

LEDIN 

MVI 

A, 2 


E4FD 

IB 


DB 

27 

; ESC 


. E4B0 

32EAFF 


STA * 

XYFLAG 


E4FE 

2007 


DD 

2007H 

;X=32 

Y=7 

E4B3 

189C 


JR 

RET 


E500 

20564543 


DT 

• VECTOR GRAPHIC 

t 


E4B5 


* 




E504 

544F5220 






E4B5 


* SET X AND 

V CURSOR 

POSITIONS 


E508 

47524150 






E4B5 

79 

XPOS 

MOV 

A,C 


E50C 

48494320 






E4B6 

FE50 


CPI 

80 


E51 0 

IB 


DB 

27 

; ESC 


E4B8 

3802 


JRC 

XINRG 


E51 1 

2008 


DD 

200811 

;X=32 

K 

II 

CD 

E4BA 

3E4F 


MVI 

A, 79 


E513 

20202020 


DT 

' MONITOR 

i 


E4BC 

1890 

XINRG 

JR 

TABRET 


E517 

4D4F4E49 






E4BE 


* 




E51B 

544F5220 






E4BE 

79 

ypos 

MOV 

A,C 


E51F 

20202020 






E4BF 

FE18 


CPI 

24 


E523 

IB 


DB 

27 

; ESC 


E4C1 

3802 


JRC 

YINRG 


! E524 

2009 


DD 

2009H 

;X = 32 

Y=9 

E4C3 

3E17 


MVI 

A, 23 


i E526 

20205645 


DT 

• VERSION 4.1 

• 


E4C5 

18A3 

VI NRG 

JR 

STORLN 


E52A 

5253494F 






. E4C7 


* 




i E52E 

4E20342E 






E4C7 

AF 

CLSTRT 

XRA 

A 


! E532 

31202020 






E4CB 

32DBFF 


STA 

CURPOS 


E536 

IB 


DB 

27 

t ESC 


E4CB 

CD6FE4 


CALL 

LIFTCURS 


E537 

008D 


DD 

8DH 

j X = 0 

Y = 13 

E4CE 

18BF 


JR 

CLLINE 


E539 

C9 


RET 




E4D0 

E4D0 » 

MSEND 

EQU 

$ 


E53A 

CDD0E4 

PROMPT 

CALL 

RPTSTNG 



E4D0 


* CURSOR STORAGE LOCATIONS 


E53D 

4D6F6E3E 


DTH 

'Mon> • 



E4D0 



ORG 

SPTR+0BH 


E54 1 

A0 






FFDB 


CURPOS 

DS 

1 

jPOS ON LINE 

E54 2 

C9 


RET 




FFDC 


LINENO 

DS 

1 

j LINE NUMBER 

E543 


* 





FFDD 


VFL 

DS 

1 

I REVERSE VID FLAG 

E543 


*WIDE ASCII DUMP 




FFDE 


WIDTH 

DS 

1 

g PRINT WIDTH 

E543 

CDD3E4 

WASCII 

CALL 

PTSTNG 



FFDF 


TOSCN 

DS 

2 

jTOP OF SCREEN 

E54 6 

41534349 


DTH 

■ASCII DUMP ' 



FFE1 


TCURPOS 

DS 

2 

STEMP POSITION 

E54A 

49204455 






FFE3 



LINK 

•M5' 


E54E 

4D50A0 






FFE3 


* ADDITIONS 

TO 4.0 MONITOR 


E551 

CD0EE1 


CALL 

TAHEX 



FFE3 



ORG 

MSEND 


E554 

CD97E5 


CALL 

HOMEC 



E4D0 


* PRINT A STRING 



E557 


* MAKE A 

RULER FOR ASCII DUMP 



E4D0 

CDDFEO 

RPTSTNG 

CALL 

CRLF 

jCRLF FIRST 

E557 78 

RULELP 

MOV 

A, B 



E4D3 

E3 

PTSTNG 

XTHL 



E558 

FE40 


CPI 

64 



E4D4 

7E 


MOV 

A,M 


E55A 

281A 


JRZ 

TERMLIN 



E4D5 

23 


INX 

II 


E55C 

E60F 


ANI 

0FH 



E4D6 

E3 


XTIIL 



E55E 

2810 


JRZ 

NUMBER 



E4D7 

A7 


ANA 

A 


E560 

E603 


ANI 

3 



E4D8 

CD8AE3 


CALL 

VIDEO 

g PRINT IT 

E562 

2808 


JRZ 

MARKER 



E4DB 

F8 


RM 



E564 

3E20 


MVI 

A,' ' 



E4DC 

18F5 


JR 

PTSTNG 


E566 

CD8AE3 

REENTR 

CALL 

VIDEO 



E4DE 


4 SIGN ON MESSAGE 



E569 

04 


INR 

B 



E4DB 

3E04 

SIGN 

HVI 

A, 4 

I CLEAR SCREEN 

E56A 

18EB 


JR 

RULELP 



E4E0 

CD8AE3 


CALL 

VIDEO 


E56C 

3E6C 

MARKER 

MVI 

A, 'l' 



E4E3 

2150F1 


LXI 

H, PAGE+150H 


E56E 

18F6 


JR 

REENTR 



E4E6 

E5 


PUSH 

H 


E570 

78 

NUMBER 

MOV 

A, B 



E4E7 

H51F1 


LXI 

D,PAGE+151H 


E571 

CD2DE2 


CALL 

BIND 



E4EA 

013000 


LXI 

B, 30H 


E574 

18F3 


JR 

REENTR+3 



E4ED 

3612 


MVI 

M, 1211 

jGRAPHIC CHARACTER 

E576 


* TOGGLE 

REVERSE VIDEO 




E4EF 

EDBO 


LDIR 



E576 

CD88E3 

TERMLIN 

CALL 

TV I DEO 



E4F1 

El 


POP 

II 


E579 

CD03E6 

WDMPl 

CALL 

SETSCRLL 



E4F2 

11A0F1 


LXI 

D, PAGE+1A0H 


E57C 

CD0FE2 


CALL 

PTAD 



E4F5 

018002 


LXI 

B, 640 


, E57F 

0E3F 


MVI 

C, 63 



E4F8 

EDBO 


LDIR 



E581 

CD8BE5 


CALL 

WDMP2 



E4FA 

CDD3E4 


CALL 

PTSTNG 


E584 

FA79E5 


JM 

WDMPl 
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I 


E587 

C8 




RZ 


' E5F3 

El 


POP 

II 


.E588 

7E 

WDMP2 



MOV 

A, M 

: E5F4 

OEOF 


MVI 

C, 15 


ES89 

47 




MOV 

B, A 

E5F6 

CDDAEO 


CALL 

SPCE 


E58A 

3E05 




MVI 

A, 1 E ’ -64 

E5F9 

CDDAEO 


CALL 

SPCE 


E58C 

CD8AE3 




CALL 

VIDEO 

E5FC 

CD88E5 


CALL 

WDMP2 


E58F 

CD3FE2 




CALL 

BMP 

E5FF 

FADFE5 


JM 

IILP1-3 


E592 

C8 




RZ 


, E602 

C9 


RET 



E593 

OD 




DCR 

C 

E603 


* CHECK TO SET 

SCROLL 

POINT 


E594 

F8 




RM 


E603 

3ADEFF 

SETSCRLL 

LDA 

WIDTH 


E595 

18F1 




JR 

WUMP2 

E606 

3D 


DCR 

A 


E597 


* HOME 

CURSOR, 

PRINT ■ 

A DDR" 

E607 

32DEFF 


STA 

WIDTH 


E597 

CDDOE4 

HOMEC 



CALL 

RPTSTNG 

E60A 

2007 


JRNZ 

CTSCRL 


E59A 

14 




DB 

"T"-64 

E60C 

0150F0 


LXI 

B, PAGE+50H 

; 2ND LINE 

E59B 

41444452 




DTI! 

•ADDR 1 

E60F 

ED43DFFF 


SBCD 

TOSCN 

(SCROLL POINT 

E59F 

AO 






E613 

C9 

CTSCRL 

RET 



E5A0 

0600 




MVI 

B,0 

E614 


ft 




E5A2 

3E18 




MVI 

A, 24 

E614 


* PROGRAM MEMORY 



E5A4 

32DEFF 




STA • 

WIDTH 

E614 

CDD3E4 

PROGRAM 

CALL 

PTSTNG 


E5A7 

C9 




RET 


E617 

50524F47 


DTII 

'PROGRAM * 


E5A8 


* MAKE 

A 

RULER 

FOR HEX 

DUMP 

E61B 

52414DA0 





E5A8 

78 

HEXRULER 


MOV 

A„B 

E61F 

CDBDEO 


CALL 

AII EX 

;ADDR IN HL 

E5A9 

FE10 




CPI 

16 

E622 

ED53E1FF 


SDED 

TCURPOS 


E5AB 

2806 




JRZ 

HEXRCT 

E626 

CD97E5 


CALL 

HOMEC 

(PRINT "ADDR" 

E5AD 

CD2BE7 




CALL 

PT2S 

E629 

CDA8E5 


CALL 

HEXRULER 


E5B0 

04 




INR 

B 

E62C 

CD88E3 


CALL 

TVIDEO 


E5B1 

18F5 




JR 

HEXRULER 

E62F 

AF 


XRA 

A 


E5B3 


* EXTEND 

FOR ASCII 


E630 

32DEFF 


STA 

WIDTH 


E5B3 

CDDAEO 

IIEXRCT 



CALL 

SPCE 

E633 

CD9DE6 


CALL 

PRT1LINE 

(PRINT LINE CONT 

E5B6 

CDDAEO 




CALL 

SPCE 

E636 

CD2FE1 

POLLOOP 

CALL 

ESCAPE 


E5B9 

0600 




MVI 

B, 0 

E639 

CDEDEO 


CALL 

HEX 


E5BB 

78 

I1EXRLP 



MOV 

A, B 

E63C 

2AE1FF 


LIILD 

TCURPOS 


E5BC 

FE10 




CPI 

16 

E63F 

301A 


JRNC 

MODMEM 


E5BE 

C8 




RZ 


E64 1 


* CONTROL CODE 

TABLE 



E5BF 

E60F 




AN I 

OFH 

E641 

FE20 


CPI 

i • 


E5C1 

CD31E2 




CALL 

BINL 

E64 3 

2846 


JRZ 

CSRT 


E5C4 

04 




INR 

B 

E645 

FE08 


CPI 

8 


E5C5 

18F4 




JR 

HEXRLP 

E647 

2845 


JRZ 

CSLT 


E5C7 


* HEX 1 

DUMP ROUTINE 


E649 

FE12 


CPI 

' R ' -64 


E5C7 

CDD3E4 

IIEXRUL 



CALL 

PTSTNG 

E64B 

2839 


JRZ 

CSDN 


E5CA 

48455820 




DTI! 

"HEX DUMP " 

E64D 

FE15 


CPI 

"U 1 -64 


B5CE 

44554D50 






E64F 

282F 


JRZ 

CSUP 


E5D2 

AO 






E651 

FE17 


CPI 

"W ' -64 


E5D3 

CD0EE1 




CALL 

TAHEX 

E653 

2839 


JRZ 

CSLT 


E5D6 

CD97E5 




CALL 

HOMEC 

E655 

FE1A 


CPI 

"Z"-64 


E5D9 

CDA8E5 




CALL 

HEXRULER 

E657 

2832 


JRZ 

CSRT 


E5DC 

CD88E3 




CALL 

TVIDEO 

E659 

18DB 


JR 

POLLOOP 


E5DF 

CD03E6 




CALL 

SETSCRLL 

E65B 


* MODIFY A MEMORY LOCATION 


E5E2 

CD0FE2 

HLP1 



CALL 

PTAD 

E65B 

2AE1FF 

MO DM EM 

LIILD 

TCURPOS 


E5E5 

E5 




PUSH 

II 

E65E 

4F 


MOV 

C, A 


ESE6 

D5 




PUSH 

D 

E65F 

3ADEFF 


LDA 

WIDTH 


E5E7 

0E10 




MVI 

C, 16 

E662 

A7 


ANA 

A 


ESE9 

7E 

HLP2 



MOV 

A, M 

E663 

7E 


MOV 

A, M 


E5EA 

CD2BE7 




CALL 

PT2S 

E664 

280D 


JRZ 

LSNIBL 


E5ED 

23 




INX 

H 

E666 

E6F0 


AN I 

OFOII 


E5EE 

OD 




DCR 

C 

E668 

B1 


ORA 

C 


E5EF 

C2E9E5 




JNZ 

HLP2 

E669 

77 

REMEM 

MOV 

M,A 


E5F2 

D1 




POP 

D 

; E66A 

3ADEFF 


LDA 

WIDTH 
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E66D 

EE01 


XRI 

1 

.E66F 

201F 


JRNZ 

RTRTN+1 

E671 

1818 


JR 

CSRT 

E673 

17 

LSNIBL 

RAL 


E674 

17 


RAL 


E675 

17 


RAL 


E676 

17 


RAL 


E677 

E6F0 


AN I 

OFOH 

E679 

B1 


ORA 

C 

E67A 

OF 


RRC 


E67B 

OF 


RRC 


E67C 

OF 


RRC 


E67D 

OF 


RRC 


E67E 

18E9 


JR 

REMEM 

E680 


* MOVE 

UP ONE LINE 


E680 

11F0FF 

CSUP 

LX I 

D s -16 

E683 

19 


DAD 

D 

E684 

1809 


JR 

RTRTN 

E686 


* MOVE 

DOWN ONE LINE 


E686 

111000 

CSDN 

LXI 

D, 16 

E6B9 

18F8 


JR 

CSUP+3 

E68B 


* MOVE 

RIGHT ONE SPACE 


E68B 

23 

CSRT 

INX 

H 

E68C 

1801 


JR 

RTRTN 

E68E 


* MOVE 

LEFT ONE SPACE 


E68E 

2B 

CSLT 

DCX 

H 

E68F 


* 



E68F 

AF 

RTRTN 

XRA 

A 

E690 

32DEFE 


STA 

WIDTH 

E693 

22E1FF 


SHLD 

TCURPOS 

E696 

3E15 

UPAROW 

MVI 

A, *U’-64 

E698 

CD8AE3 


CALL 

VIDEO 

E69B 

1896 


JR 

polloop-: 

E69D 


4 PRINT A LINE CONTAINING ((H)) 

E69D 

2AE1FF 

PRT1LINE LHLD 

TCURPOS 

E6A0 

E5 


PUSH 

H 

E6A1 

Dl 


POP 

D 

E6A2 

7D 


MOV 

A, L 

E6A3 

F60F 


ORI 

OFH 

E6A5 

5F 


MOV 

E, A 

E6A6 

E6F0 


AN I 

OFOH 

E6A8 

6F 


HOV 

L,A 

E6A9 

CDE2E5 


CALL 

HLP1 

E6AC 


* NOW 

PUT CURSOR WHERE 

IT GOES 

ESAC 

CD6FE4 


CALL 

LIFTCURS 

E6AF 

2AE1FF 


LHLD 

TCURPOS 

E6B2 

7D 


MOV 

A, L 

E6B3 

E60F 


ANI 

OFH 

E6B5 

6F 


MOV 

L,A 

E6B6 

3E05 


MVI 

A, 5 

E6B8 

2D 

PLOP1 

DCR 

L 

E6B9 

FAC0E6 


JM 

PGCONT 

E6BC 

C603 


ADI 

3 

E6BE 

18F8 


JR 

PLOP1 

E6C0 

6F 

PGCONT 

MOV 

L, A 

E6C1 

3ADEFF 


LDA 

WIDTH 

E6C4 

85 


ADD 

L 


I 

I 


PAGE 2C 



I 

I 

| E6C5 

! E6C5 32DBFF 
j E6C8 C36FE4 
I E6CB 
! E6CB 
| E6CB 

E6CB CDD3E4 
E6CE 52454749 
| E6D2 53544552 
I E6D6 D3 
E6D7 

1 E6D7 E3 
| E6D8 F5 
| E6D9 CD31E7 
{ E6DC 2B 
I E6DD CD0FE2 
I E6E0 El 
I E6E1 C5 
| E6E2 CD86E7 
E6E5 Cl 
I E6E6 CD12E2 
{ E6E9 El 
: E6EA 22E3FF 
j E6ED CDA7E7 
I E6F0 DDE 5 
| E6F2 El 
, E6F3 CD12E2 
' E6F6 FDE5 
E6F8 El 
E6F9 CD12E2 
E6FC 210000 
E6FF 39 
E700 22E5FF 
E703 CD12E2 
E706 08 
E707 F5 
E708 El 
E709 CD12E2 
E70C D9 
E70D CDA7E7 
E710 D9 
E71 1 0A 
E712 CD2BE7 
E71 5 1A 
E716 CD2BE7 
E719 2AE3FF 
E71C 7E 
E71D CD2BE7 
E720 2AE5FF 
E723 F9 
E724 El 
E725 CD12E2 
E72B C340E0 
E72B 

E72B CD26E2 
E72E C3DAE0 
E731 


* A = 5+3*L+W 

STA CURPOS 

JMP LIFTCURS 


* DISPLAY REGISTERS 

DREGS CALL PTSTNG 

DTH ’REGISTERS’ 


* DUMP REGISTERS AFTER ENTRY FROM RST 7 

DUMPREGS XTIIL 

PUSH PSW 

CALL DISPREGS 

DCX H (GET BREAK ADD 

CALL PTAD 

POP H 

PUSH B 

CALL PRTFLGS 

POP B 

CALL PTAD+3 > PRINT AF 

POP H 

SHLD HLTEMP 

CALL PTHREE ; PRINT B D H 

PUSH IX 

POP H 

CALL PTAD+3 (PRINT IX 

PUSH IY 

POP II 

CALL PTAD+3 ;PRINT IY 

LX I H,0 

DAD SP 

SHLD SPTEHP 

CALL PTAD+3 »PRINT SP 

EXAF 

PUSH PSW 

POP H 

CALL PTAD+3 

EXX 

CALL PTHREE 

EXX 

LDAX B 

CALL PT2S 

LDAX D 

CALL PT2S 

LHLD IILTEHP 

MOV A,M 

CALL PT2S 

LHLD SPTEMP 

SPIIL 

POP H 

CALL PTAD+3 

JMP CLRBRK (CLEAR BREAKPOINT 

PT2S CALL PT2 (PRINT 2 CHARS 

JMP SPCE (PRINT SPACE 

* DISPLAY REGISTER HEADER ON SCREEN 
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E731 

CDD0E4 

DXSPREGS 

CALL 

RPTSTNG 


E734 

14 



DB 

•T’-64 


E735 

41444452 



DT 

8 ADDR FLAGS AF I 

E739 

20464C41 






E73D 

47532020 






E741 

41462020 






E74 5 

20424320 






E749 

20204445 






E74D 

20202048 



DT 

8 HL 

IX IX 

E751 

4C202020 






E755 

49582020 






E759 

20495920 






E75D 

20205350 






E761 

20 






E762 

20204146 



DT 

8 AF 8 


E766 

27 



DB 

27H 

s • 

E767 

20204243 



DT 

8 BC 8 


E76B 

27 



DB 

27H 


E76C 

20204445 



DT 

• DE 8 


E770 

27 



DB 

27H 


E771 

2020484C 



DT 

' HL 8 


E775 

27 



DB 

27H 


E776 

20404220 



DT 

8 @B @D 

on esp 8 

E77A 

40442040 






E77E 

48204053 






E782 

5020 






E784 

94 



DB 

8 T 8 +64 


E785 

C9 



RET 



E786 


ft 





E786 


ft 

PRINT FLAGS 




E786 

015A40 

PRTFLGS 

LX I 

B, 4 05 AH 

»z 

E789 

CDB6E7 



CALL 

MASKFLG 


E78C 

014301 



LX I 

B, 143H 

|C 

E78F 

CDB6E7 



CALL 

MASKFLG 


E792 

014D80 



LX I 

B, 804DI1 

|M 

E795 

CDB6E7 



CALL 

MASKFLG 


E798 

014504 



LX I 

B, 44511 

S E 

E79D 

CDB6E7 



CALL 

MASKFLG 


E79E 

014810 



LXI 

B, 104811 

;ii 

E7A1 

CDB6E7 



CALL 

MASKFLG 


E7A4 

C3DAE0 



JMP 

SPCE 


E7A7 


ft 





E7A7 


ft 

PRINT BC DE 

IIL IN ORDER 


E7A7 

E5 

PTHREE 

PUSH 

H 


E7A8 

C5 



PUSH 

B 


E7A9 

El 



POP 

II 


E7AA 

CD12E2 



CALL 

PTAD+3 


E7AD 

D5 



PUSH 

D 


E7AE 

El 



POP 

II 


E7AF 

C012E2 



CALt 

PTAD+3 


E7B2 

El 



POP 

H 


E7B3 

C312E2 



JMP 

PTAD+3 


E7B6 


ft 





E7B6 

7D 

MASKFLG 

MOV 

A,L 


E7B7 

AO 



ANA 

B 


E7B8 

3E20 



MVI 

A, 2011 


E7BA 

CA8AE3 



JZ 

VIDEO 




PAGE 22 


E7BD 

79 


MOV 

A»C 



E7BE 

C38AE3 


JMP 

VIDEO 



E7C1 


ft 





E7C1 


* SET BREAKPOINT 




E7C1 

CDD3E4 

SETBRK 

CALL 

PTSTNG 



E7C4 

42524541 


DTK 

•BREAK AT 

9 


E7C8 

4B204154 






E7CC 

AO 






E7CD 

CDBDEO 


CALL 

AIIEX 



E7D0 

1A 


LDAX 

D 



E7D1 

32E9FF 


STA 

BRKCODE 



E7D4 

ED53E7FF 


SDED 

BKPTLOC 



E7D8 

3EFF 


MVI 

A, 0FFII 

j RST 7 


E7DA 

12 


STAX 

D 



E7DB 

C9 


RET 




E7DC 


ft 





E7DC 


4 EXTERNAL 

COMMUNICATIONS 



E7DC 

CDD3E4 

EXTCOM 

CALL 

PTSTNG 



E7DF 

45585420 


DTII 

•EXT COM 8 



E7E3 

434F4DA0 






E7E7 

DB05 

RECEIVE 

IN 

5 



E7E9 

E602 


AN I 

2 



E7EB 

2805 


JRZ 

NEXCHR 



E7ED 

DB04 


IN 

4 



E7EF 

CD8AE3 


CALL 

VIDEO 



E7F2 

CD2FE1 

NEXCHR 

CALL 

ESCAPE 



E7F5 

28F0 


JRZ 

RECEIVE 



E7F7 

D304 


OUT 

4 



E7F9 

18EC 


. JR 

RECEIVE 



E7FB 


a 





E7FB 


4 TEMPORARY 

STORAGE 1 

LOCATIONS FOR 

REGISTERS, ETC 0 


E7FB 



ORG 

TCURPOS+2 



FFE3 


HLTEMP 

DS 

2 



FFE5 


SPTEMP 

DS 

2 



FFE7 


BKPTLOC 

DS 

2 

,-BREAKPT 

LOCATION 

FFE9 


BRKCODE 

DS 

1 

,°CODE AT 

BREAKPT 

FFEA 


XYFLAG 

DS 

1 

t CURSOR : 

XY FLAG 




